home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / make / icmake-6.000 / icmake-6 / icmake / comp / young.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-02-08  |  455 b   |  22 lines
  1. /*
  2.                             Y O U N G . C
  3. */
  4.  
  5. #include "iccomp.h"
  6.  
  7. ESTRUC_ *young (lval, rval)
  8.     ESTRUC_
  9.         *lval,
  10.         *rval;
  11. {
  12.     if (test_binop(op_younger, lval, rval))
  13.         return (lval);                      /* test for correct types */
  14.  
  15.     etoc(lval);                             /* convert to code */
  16.     etoc(rval);
  17.  
  18.     defcode(lval, rval, op_younger);
  19.  
  20.     return (lval);                          /* return new expression */
  21. }
  22.